home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / DB_CLIPP / 0292.ZIP / CUBS.ARC / AGE.PRG next >
Text File  |  1985-12-21  |  256b  |  11 lines
  1.  
  2.         STORE DATE() - DOB TO DAYS
  3.  
  4.         SET DECIMALS TO 1
  5.  
  6.         STORE DAYS / 367.3 TO MAGE
  7.  
  8.         SET SAFETY OFF
  9.  
  10.         REPLACE AGE WITH MAGE
  11.